﻿Public Class frmKeyWord
    Dim mKeyWord As String
    Sub New(ByVal strKeyWord As String)
        ' 此调用是 Windows 窗体设计器所必需的。
        InitializeComponent()
        ' 在 InitializeComponent() 调用之后添加任何初始化。
        mKeyWord = strKeyWord
        Me.Text &= ":[" & mKeyWord & "]"
    End Sub
End Class